você sabe o porque dessa área se chamar área de desenvolvimento?
- Fórum
- OTServ
- Discussion
- Noticias - Arquivo
- [Arquivado]Recompensa Pela Morte
5
1.5k
1 mês depois...
info
Grupo: Conde
Registrado: 07/05/08
Posts: 612
Reputação: +12
Char no Tibia: leviana luciferiana

01 de fevereiro de 2010 às 14:17
info
Grupo: Conde
Registrado: 29/04/09
Posts: 904
Reputação: +389
Char no Tibia: Jabuti Selvagem

01 de fevereiro de 2010 às 14:51
Por favor, enriqueça seu tópico usando quote! Assim está difícil de entender.
info
Grupo: Barão
Registrado: 01/07/09
Posts: 216
Reputação: +4

01 de fevereiro de 2010 às 15:14
Maldita inclusão digital.
8 anos depois...
info
Grupo: Herói
Registrado: 28/11/10
Posts: 3.4k
Reputação: +585
Gênero: Masculino

25 de abril de 2018 às 16:24
Esta noticia foi arquivada.
Este tópico está fechado e foi movido para Noticia - Arquivo.
+ Caso tenha atualizações você poderá criar outro tópico.
Este tópico está fechado e foi movido para Noticia - Arquivo.
+ Caso tenha atualizações você poderá criar outro tópico.



info
Grupo: Campones
Registrado: 05/01/07
Posts: 61
Reputação: +3
Char no Tibia: Gaby Slayer
Assim eu fis No Ot 8.40 uma recompensa que quando você mata o player aparece a skull dele como Poresenplo
You See To Skull Reconhecid No Name lvl 666 kiled by Antiemoxlr lvl 666<
Va en Creature script e coloque isto Na pasta Playerdeath
dofile("./config.lua")
function onDeath(cid, corpse, killer)
local playerpos = getPlayerPosition(cid)
local skull = doCreateItem(2229 ,1,playerpos)
doSetItemSpecialDescription(skull, 'Skull to ' .. getCreatureName(cid) .. ' Killed by ' .. getCreatureName(killer) .. ' at level '.. getPlayerLevel(cid) ..'')
doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You are dead.")
if deathListEnabled == "yes" then
if sqlType == "mysql" then
env = assert(luasql.mysql())
con = assert(env:connect(mysqlDatabase, mysqlUser, mysqlPass, mysqlHost, mysqlPort))
else -- sqlite
env = assert(luasql.sqlite3())
con = assert(env:connect(sqliteDatabase))
end
local byPlayer = FALSE
if killer == FALSE then
killerName = "field item"
else
if isPlayer(killer) == TRUE then
byPlayer = TRUE
end
killerName = getCreatureName(killer)
end
assert(con:execute("INSERT INTO `player_deaths` (`player_id`, `time`, `level`, `killed_by`, `is_player`) VALUES (" .. getPlayerGUID(cid) .. ", " .. os.time() .. ", " .. getPlayerLevel(cid) .. ", '" .. escapeString(killerName) .. "', " .. byPlayer .. ");"))
local cursor = assert(con:execute("SELECT `player_id` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. ";"))
local deathRecords = numRows(cursor)
if sqlType == "mysql" then
while deathRecords > maxDeathRecords do
delete = assert(con:execute("DELETE FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1;"))
deathRecords = deathRecords - 1
end
else
while deathRecords > maxDeathRecords do
delete = assert(con:execute("DELETE FROM `player_deaths` WHERE `rowid` = (SELECT `rowid` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1);"))
deathRecords = deathRecords - 1
end
end
con:close()
env:close()
end
end
Olha Funcionol No meu ot Vamos ver se Funciona no seu =p